﻿Imports System
Imports System.Data
Imports System.Data.SqlClient
Module DataProviders
    Public Function ConnectDB()
        Dim str As String = "Data Source=.\SQLEXPRESS;Initial Catalog=QLNhaHang;Integrated Security=True"
        Dim cn As New SqlConnection(str)
        cn.Open()
        Return cn
    End Function
End Module
